home *** CD-ROM | disk | FTP | other *** search
/ .net 2002 March / DotNetMagazine-Issue107-Coverdisc-NET107-02-03-PCMac.bin / pc / PC Software / picks / HTTrack / httrack-3.22-3.exe / {app} / src_win / WinHTTrack / HTTrackInterface.c < prev    next >
Encoding:
C/C++ Source or Header  |  2002-10-30  |  5.4 KB  |  255 lines
  1.  
  2. #include <stdio.h>
  3. #include <stdlib.h>
  4. #include <string.h>
  5. #include <time.h>
  6.  
  7. #include "htsglobal.h"
  8. #include "htsbase.h"
  9.  
  10. #include "HTTrackInterface.h"
  11.  
  12. // Lecture d'une ligne (peut Ítre unicode ‡ priori)
  13. int linput(FILE* fp,char* s,int max) {
  14.   int c;
  15.   int j=0;
  16.   do {
  17.     c=fgetc(fp);
  18.     if (c!=EOF) {
  19.       switch(c) {
  20.         case 13: break;  // sauter CR
  21.         case 10: c=-1; break;
  22.         case 9: case 12: break;  // sauter ces caractËres
  23.         default: s[j++]=(char) c; break;
  24.       }
  25.     }
  26.   }  while((c!=-1) && (c!=EOF) && (j<(max-1)));
  27.   s[j]='\0';
  28.   return j;
  29. }
  30. int linput_trim(FILE* fp,char* s,int max) {
  31.   int rlen=0;
  32.   char* ls=(char*) malloct(max+2);
  33.   s[0]='\0';
  34.   if (ls) {
  35.     char* a;
  36.     // lire ligne
  37.     rlen=linput(fp,ls,max);
  38.     if (rlen) {
  39.       // sauter espaces et tabs en fin
  40.       while( (rlen>0) && ((ls[max(rlen-1,0)]==' ') || (ls[max(rlen-1,0)]=='\t')) )
  41.         ls[--rlen]='\0';
  42.       // sauter espaces en dÈbut
  43.       a=ls;
  44.       while((rlen>0) && ((*a==' ') || (*a=='\t'))) {
  45.         a++;
  46.         rlen--;
  47.       }
  48.       if (rlen>0) {
  49.         memcpy(s,a,rlen);      // can copy \0 chars
  50.         s[rlen]='\0';
  51.       }
  52.     }
  53.     //
  54.     freet(ls);
  55.   }
  56.   return rlen;
  57. }
  58. int linput_cpp(FILE* fp,char* s,int max) {
  59.   int rlen=0;
  60.   s[0]='\0';
  61.   do {
  62.     int ret;
  63.     if (rlen>0)
  64.     if (s[rlen-1]=='\\')
  65.       s[--rlen]='\0';      // couper \ final
  66.     // lire ligne
  67.     ret=linput_trim(fp,s+rlen,max-rlen);
  68.     if (ret>0)
  69.       rlen+=ret;
  70.   } while((s[max(rlen-1,0)]=='\\') && (rlen<max));
  71.   return rlen;
  72. }
  73.  
  74. // idem avec les car spÈciaux
  75. void rawlinput(FILE* fp,char* s,int max) {
  76.   int c;
  77.   int j=0;
  78.   do {
  79.     c=fgetc(fp);
  80.     if (c!=EOF) {
  81.       switch(c) {
  82.         case 13: break;  // sauter CR
  83.         case 10: c=-1; break;
  84.         default: s[j++]=(char) c; break;
  85.       }
  86.     }
  87.   }  while((c!=-1) && (c!=EOF) && (j<(max-1)));
  88.   s[j++]='\0';
  89. }
  90.  
  91. // Like linput, but in memory (optimized)
  92. int binput(char* buff,char* s,int max) {
  93.   char* end;
  94.   int count;
  95.  
  96.   // clear buffer
  97.   s[0]='\0';
  98.   // end of buffer?
  99.   if ( *buff == '\0')
  100.     return 1;
  101.   // find ending \n
  102.   end=strchr(buff,'\n');
  103.   // ..or end of buffer
  104.   if (!end)
  105.     end=buff+strlen(buff);
  106.   // then count number of bytes, maximum=max
  107.   count=min(max,end-buff);
  108.   // and strip annoying ending cr
  109.   while( (count>0) && (buff[count] == '\r'))
  110.     count--;
  111.   // copy
  112.   if (count > 0) {
  113.     strncatbuff(s, buff, count);
  114.   }
  115.   // and terminate with a null char
  116.   s[count]='\0';
  117.   // then return the supplemental jump offset
  118.   return (end-buff)+1;
  119. } 
  120.  
  121. int fexist(char* s) {
  122.   FILE* fp;
  123.   fp=fopen(s,"rb");
  124.   if (fp!=NULL) fclose(fp);
  125.   return (fp!=NULL);
  126. } 
  127.  
  128. int fsize(char* s) {
  129.   FILE* fp;
  130.   fp=fopen(s,"rb");
  131.   if (fp!=NULL) {
  132.     int i;
  133.     fseek(fp,0,SEEK_END);
  134.     i=ftell(fp);
  135.     fclose(fp);
  136.     return i;
  137.   } else return -1;
  138. }
  139.  
  140. TStamp time_local(void) {
  141.   return ((TStamp) time(NULL));
  142. }
  143.  
  144.  
  145.  
  146.  
  147.  
  148. #define NOSTATIC_RESERVE(name, type, nelt) NOSTATIC_XRESERVE(name, type, nelt)
  149. #define NOSTATIC_XRESERVE(name, type, nelt) do { \
  150.   __declspec( thread ) static type thValue[nelt]; \
  151.   __declspec( thread ) int  static initValue = 0; \
  152.   name = thValue; \
  153.   if (!initValue) { \
  154.     initValue = 1; \
  155.     memset(&thValue, 0, sizeof(thValue)); \
  156.   } \
  157. } while(0)
  158.  
  159.  
  160.  
  161. typedef struct {
  162.   char buff[16][HTS_URLMAXSIZE*2*2];
  163.   int rol;
  164. } concat_strc;
  165. char* concat(const char* a,const char* b) {
  166.   concat_strc* strc;
  167.   NOSTATIC_RESERVE(strc, concat_strc, 1);
  168.   strc->rol=((strc->rol+1)%16);    // roving pointer
  169.   strcpybuff(strc->buff[strc->rol],a);
  170.   if (b) strcatbuff(strc->buff[strc->rol],b);
  171.   return strc->buff[strc->rol];
  172. }
  173. // conversion fichier / -> antislash
  174. #if HTS_DOSNAME
  175. char* __fconv(char* a) {
  176.   int i;
  177.   for(i=0;i<(int) strlen(a);i++)
  178.     if (a[i]=='/')  // convertir
  179.       a[i]='\\';
  180.   return a;
  181. }
  182. char* fconcat(char* a,char* b) {
  183.   return __fconv(concat(a,b));
  184. }
  185. char* fconv(char* a) {
  186.   return __fconv(concat(a,""));
  187. }
  188. #endif
  189.  
  190. /* / et \\ en / */
  191. char* __fslash(char* a) {
  192.   int i;
  193.   for(i=0;i<(int) strlen(a);i++)
  194.     if (a[i]=='\\')  // convertir
  195.       a[i]='/';
  196.   return a;
  197. }
  198. char* fslash(char* a) {
  199.   return __fslash(concat(a,""));
  200. }
  201.  
  202. // conversion minuscules, avec buffer
  203. char* convtolower(char* a) {
  204.   concat_strc* strc;
  205.   NOSTATIC_RESERVE(strc, concat_strc, 1);
  206.   strc->rol=((strc->rol+1)%16);    // roving pointer
  207.   strcpybuff(strc->buff[strc->rol],a);
  208.   hts_lowcase(strc->buff[strc->rol]);  // lower case
  209.   return strc->buff[strc->rol];
  210. }
  211.  
  212. // conversion en minuscules
  213. void hts_lowcase(char* s) {
  214.   int i;
  215.   for(i=0;i<(int) strlen(s);i++)
  216.     if ((s[i]>='A') && (s[i]<='Z'))
  217.       s[i]+=('a'-'A');
  218. }
  219.  
  220. char* next_token(char* p,int flag) {
  221.   int detect=0;
  222.   int quote=0;
  223.   p--;
  224.   do {
  225.     p++;
  226.     if (flag && (*p=='\\')) {   // sauter \x ou \"
  227.       if (quote) {
  228.         char c='\0';
  229.         if (*(p+1)=='\\')
  230.           c='\\';
  231.         else if (*(p+1)=='"')
  232.           c='"';
  233.         if (c) {
  234.           char tempo[8192];
  235.           tempo[0]=c; tempo[1]='\0';
  236.           strcatbuff(tempo,p+2);
  237.           strcpybuff(p,tempo);
  238.         }
  239.       }
  240.     }
  241.     else if (*p==34) {  // guillemets (de fin)
  242.       quote=!quote;
  243.     }
  244.     else if (*p==32) {
  245.       if (!quote)
  246.         detect=1;
  247.     }
  248.     else if (*p=='\0') {
  249.       p=NULL;
  250.       detect=1;
  251.     }
  252.   } while(!detect);
  253.   return p;
  254. }
  255.